setdisplay(240,320,32,1):paper(0xFFFFFF):ink(0):pen(0):cls
for f=1 to 20
a=100-int(rnd(200))
b=100-int(rnd(200))
prints("min("+str$(a)+","+str$(b)+")="+str$(min(a,b)))
next
waitkey